home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
EnigmA Amiga Run 1996 July
/
EnigmA AMIGA RUN 09 (1996)(G.R. Edizioni)(IT)[!][issue 1996-07 & 08][EARSAN CD VIII].iso
/
earcd
/
patches
/
nfapatch.lha
/
GloomDeluxe
< prev
next >
Wrap
Text File
|
1996-02-03
|
1KB
|
67 lines
;Script was created by PK'95,96
cd MISC
SET World `REQUESTCHOICE "GloomDeluxe Selector" "Which world do you wanna play?" Spacehulk GothicTomb Hell "Last Used"`
if $World NOT EQ 0
SET Level `REQUESTCHOICE "GloomDeluxe Selector" "Which level do you wanna play?" 1 2 3 4 5 6 7 All`
if $Level EQ 0
copy Script$World to Script
Skip End
endif
echo ";GloomDeluxe Script by PK'95,96" > Script
if $World EQ 1
echo pict_spacehulk >> Script
echo tile_1 >> Script
endif
if $World EQ 2
echo pict_gothic >> Script
echo tile_2 >> Script
endif
if $World EQ 3
echo pict_hell >> Script
echo tile_3 >> Script
endif
echo draw_ >> Script
echo show_ >> Script
echo "text_pk gloom world and level selector used!" >> Script
echo wait_ >> Script
echo dark_ >> Script
if $World EQ 1
echo play_map1_$Level >> Script
endif
if $World EQ 2
echo play_map3_$Level >> Script
endif
if $World EQ 3
echo play_map4_$Level >> Script
endif
echo pict_theend >> Script
echo draw_ >> Script
echo show_ >> Script
echo "text_congratulations! you have finished selected level!" >> Script
echo wait_ >> Script
echo done_ >> Script
endif
Lab End
cd /
SET Engine `REQUESTCHOICE "GloomDeluxe Selector" "With which engine do you wanna play?" Old Deluxe Exit`
if $Engine EQ 1
gloom
endif
if $Engine EQ 2
gloom2
endif
;End of Start